Code
customer_cohortdata_tbl <- read_rds("data/synthdata_longframe_cohort_tbl.rds")
customer_cohortdata_tbl |> glimpse()Rows: 50,000
Columns: 4
$ customer_id <chr> "LFC201001_0001", "LFC201001_0002", "LFC201001_0003", "…
$ cohort_qtr <chr> "2010 Q1", "2010 Q1", "2010 Q1", "2010 Q1", "2010 Q1", …
$ cohort_ym <chr> "2010 01", "2010 01", "2010 01", "2010 01", "2010 01", …
$ first_tnx_date <date> 2010-01-01, 2010-01-01, 2010-01-01, 2010-01-01, 2010-0…
Code
customer_simparams_tbl <- read_rds("data/synthdata_longframe_simparams_tbl.rds")
customer_simparams_tbl |> glimpse()Rows: 50,000
Columns: 9
$ customer_id <chr> "LFC201001_0001", "LFC201001_0002", "LFC201001_0003", …
$ cohort_qtr <chr> "2010 Q1", "2010 Q1", "2010 Q1", "2010 Q1", "2010 Q1",…
$ cohort_ym <chr> "2010 01", "2010 01", "2010 01", "2010 01", "2010 01",…
$ first_tnx_date <date> 2010-01-01, 2010-01-01, 2010-01-01, 2010-01-01, 2010-…
$ customer_lambda <dbl> 0.110749068, 0.140668542, 0.107118406, 0.119591579, 0.…
$ customer_mu <dbl> 0.224078451, 0.074647615, 0.113866440, 0.054091413, 0.…
$ customer_tau <dbl> 12.6341383, 14.8118968, 0.8963641, 15.4056745, 4.29091…
$ customer_amtmn <dbl> 41.922469, 13.268255, 196.981298, 16.214932, 33.372405…
$ customer_amtcv <dbl> 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, …
Code
customer_transactions_tbl <- read_rds("data/synthdata_longframe_transactions_tbl.rds")
customer_transactions_tbl |> glimpse()Rows: 460,621
Columns: 4
$ customer_id <chr> "LFC201001_0008", "LFC201001_0004", "LFC201001_0005", "L…
$ tnx_timestamp <dttm> 2010-01-01 04:27:56, 2010-01-01 05:11:45, 2010-01-01 06…
$ invoice_id <chr> "T20100101-0001", "T20100101-0002", "T20100101-0003", "T…
$ tnx_amount <dbl> 17.07, 27.40, 45.36, 367.20, 29.83, 225.63, 20.67, 429.3…